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We are now located at Big Bear Lake, 8500 


feet high in the San Bernardino Mountains 
of Southern California! This, among many 
other reasons, has caused- this exceed 
late issue. You will also , 

be receiving a September/ 
_ October issue later this 
month. 
We are seriously considering | 
going to a bi-monthly issue, ff 
but will expand such an is- 
sue to double it's current | 
$126.1 .6., 24 pages). There-§ 
fore a 12 issue subscription 
would become a six i Hsu 
scription. I don't elieve 
we would find any problems 
meeting our de lines with 
the expanded time frame! — 
Please write or call us with | 
your comments, we need input | 
in this area! : 
Now, on to serious Wacker. ia 
As mentioned in our last is- Emm 

sue we are revi g a 16K add-on (VIPER 
I) with new "EXPANDED BASIC" language | 


AGE). Our findings after finally receiv- 


ing a VIPER LOK, review can be summed up 
in one word: "WOW"!!! 

We placed our Bally on top of the "VIPER 
I“ Gnit. and- plugged the cable into the 

40 pin connector on the rear of the Bally. 
We also plugged the Bally AC converter 
into the filtered AC outlet provided on 
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the rear of the "VIPER I". 


this allowed 
us to turn on the "VIPER I" using the 
lighted On/Off Switch and the Bally at 
the same time. 


If you are one of our new readérs and do 
not have the "Old BASIC" with separate .-_ 


Audio Cassette Interface, the Vie I" 
will not aa usable by you üntil a later 
The "8K Extended Bas- 
i hag to be re-written for 
he built-in Audio Inter- 
face which is included in 
the NEW "BASIC CARTRIDGE". 


The VIPER has 3 switches 

t into the front panel: 
eft-most is On/Off; center 
is Auto Write Protect/Pro- 
Write; right-most is 
ess - 8K/24K. 

Ẹ we started by pressing Che 
@ON and pete Write ana 24K 


K TR : INPUT" per "Go", 

e pressed "PLAY" on our 

dj recorder, After a short 
pt geet ee ee the 


Upon ciple ian of Toad, 
SET AUTO WRITE MODE, CALL 
24576 TO START" was printed on screen. 

We were, however, forwarned by the people 
at "ALTERNATIVE ENGINEERING" that the 
VIPER would be looking for full size 
ASCII Keyboard Input through the built- 
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in Keyboard connector, and since we didn't 


have their keyboard attached we should do 
a POKE before we pressed the "AUTO WRITE" 
Protect switch. So we keyed in "%(31703) 
=201", HIT GO, pressed the "AUTO WRITE" 
protect switch and then keyed in "CALL 
24576" and pressed "GO". The screen cl- 
eared immediately and "EXTENDED BASIC 
1.0" was printed on-screen in a tiny 3 x 
5 blue character set. We were in bus- 
iness! 


The "VIPER I" comes with 2 tapes; #1: The 
Language, with "EXT. BASIC DEMO", on the 
flip side and #2: "CHECKSUM PROGRAM for 
EXT. BAS. 1.0" with "VIPER TEST PATTERN" 
on the flip side. 


Alternative Engineering suggested we lo- 
ad the "CHECKSUM" program which would 
automatically check the original load 
for errors. We did so with a ":INPUT" 
and "GO" again. By using the program, 
you will be assured of a perfect load. 


Next, we loaded the "DEMO" tape, which 
gave us an on-screen listing of all.the 
new commands available followed by a 
dazzling full color demo of these com- 
mands. The following is a partial list- 
ing of the new commands available with 
the "EXTENDED BASIC 1.0" and the "VIPER 
a is 


NEW COMMANDS.... 


1. NEW: Erases all memory. This is the 
same as a reset. 

2. ZERO: Zeroes all sincle letter 
variables (A - Z). 

3. DEFAULT: Resets device variables 
such as character windows, etc. 

4. DATA: Initializes variables (i.e., 
DATA @(5),10,20,30, will give you 
@(5)=10 @(6)=20 @(7)=30). Very pow- 
erful, saves lots of memory. You 
merely place starting variable first; 
we could have used any starting var- 
jable including single letter vari- 
ables such as A, B or C, etc. 

5. CIRCLE: Format = X,Y, RADIUS, NEW 
MODE. Example: CI.%,9,28,1 (see 
NEW MODE later in article) will put 
up a 1 pixel thick circle in the cen- 
ter of the screen 20 pixels wide; 
or, FOR R=1 TO 26; CI.Ø,Ø,R,l; NEXT 
R will put up a solid circle in the 
same location. 

6. SCROLL: Format = X,Y,X size,Y size, 
Number of lines (Pixels). 

7 SNAP: Format. =.X,¥,X% size,¥ size, 
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starting string location. Imagine 
you had built a 19 pixel by 1% pixel 
character in the center of the scre- 
en - to save this entire character 
plus a small border around him so he 
could move around the screen without 
blinking and erasing any trail you 
would key in SNAP@,%,12,12,@(%). This 
character would then reside in str- 
ings @(Ø) through @(23) [12 + 12=24]. 

8. SHOW: Format = X,Y,Showmode,@(#) 
After you have SNAPPED a character, 
you can now clear the screen and 
SHOW him any where you want virtual- 
ly instantaineously (in the same or 
different colors) !! 

9. SHOWMODE: Ø = Plop; 1 = OR; 2 = XOR 

10. NEW MODES: @ = Nothing; 1 = XOR 1; 
Jaso KOR-2 53-2 "KOR“3 74" ="PLOP Ø; 
5 = PLOR 17 6 =*PHOP 2; 7 = PIOR 3 


If you did not understand 9 or 10 
above, suffice it to say that this 
is the machine language way of get- 
ting dramatic color effects. In 
Bally Basic, the only way to get 
these effects is to learn machine 
language and POKE you routines in 
RAM. With Extended Basic, you don't 
have to thoroughly understand, you 
Just do it! 


NEW VARIABLES.... 


ie exe andi XR: AL = Left boundary graph- 
ics window. XR = Right boundary 
graphics window. 

T24 “YE ang YB: YT = Top boundary graph- 
ics window. YB = Botton boundary 
graphics window. 

By using these four variables you can set 
up a graphics window that will display 
graphics. Even though the size of your 
graphic may exceed the window boundries, 
the only graphics that will show on- 
screen will be within the window you 
have designed. 

Po CE andi CR CL’ = Left character win- 
dow boundary. CR = Right character 
window boundary. 

14. CT and CB: CT = Top character win- 
dow boundary. CB = Botton character 
window boundary. 

The use of these 4 variables allows you 
to pull some extremely sharp tricks with 
on-screen printing: Setting CL=$; CR=4; 
CT=59; CB=-5%; LIST will allow you to 
list a program vertically one letter at 
a time instead of horizontally one line 
at a time with scrolling. | 


15. CF = CHARACTER FONT. The use of 
this variable allows you to select 
large or small characters in a pr- 
int statement. CF=LA.: PRINT "HI" 
would PRINT "HI" in large characters. 

16. CC = CHARACTER COLOR 


ni 


17. FA = FOREGROUND COLOR #1- 
FB = FOREGROUND COLOR #2 
19. FC = FOREGROUND COLOR #3 
20. BC = BACKGROUND COLOR 
21. IC = Last character printed on scre- 


en. This variable will return the 
ASCII value of the last character 
printed. We don't immediately find 
any tremendous use ps this one! 

22. NB = NUMBER BASE: 2 = Binary; 10 = 
Decimal; 16 = Hexidecimal. Example: 
Here is a decimal to hexadecimal 
converter program: . 
1g INPUT eas gael NB=16; PRINT D; NB= 

19; GOTO 19 


23. t= = Converts Hex to Decimal when 
. placed in front of a Hex value such _ 
as, PRINT !2FF will yield 767 a 
ed on-screen. 

24. + = Placing a + in front of any 
variable (except SZ) will return with 
it's memory location. Such as: | 
PRINT <C will yield "-29522". 


The following is a listing of sag "VIPER 
TEST PATTERN": 


1 3 VIPER TEST PATTERN = 
2. EXTENDED BASIC 1.0 

3. ALTERNATIVE ENGINEERING — 
4. P.O. BOX 128 

5. GARDINER , MAINE 04345 


6. x 
10 CLEAR sBC=0 
30 DATA A,0,0,0,05 E=RND (7) 
Ei) FOR 2=170 RND (25) 5STEP RND (2)+1 
50 CIRCLE 0,0,2 „Eti CIRCLE 0,0,2-10,E-1; CIRCLE 0,0, 1410, E+2 
BOX -A, B, c, D, E;BOX A,-B, t DÉ; BOX 0,0,2-15, 7-15, E- -2; s BOX 
s i T D, E; BOX us B,C, D, sE;A= At2; BA m1; C=C#2; D=C; NEXT l 
60 GOTO 
mis progr ATOS R iaa AAG 
changing complex pattern on the screen. 
You would swear t “a2 different colors 
are on screen at the same time. 


The VIPER is designed to match your Bally 


Unit, it is black with walnut sides. This 
Tissa professionally produced product and 
the PC Boards and Components are a de- 
light to behold!! No wire wrapping here! 


ing 8K extended BASIC is $250.00. (We > 
had heard of $225. introductory price, 
and they told us they are not honoring 


rectified. 


HARDWARE: 
I" with a 3 prong grounded outlet, other- 
wise you could have "glitch problems" 
when you turn on some other appliance 


The total price for the "VIPER I" includ- 


the $225 price any T Alternative 
Engineering will have a plug-in Keyboard 


available sometime in November '81 at 
$175.00 which will plug in the rear of 
the "VIPER I". This unit is available 
directly from ALTERNATIVE ENGINEERING, 
P. O. BOX 128, Gardiner, Maine 04345; 
allow approximately 8 weeks for ship- 
ping or you may order a "VIPER I" from 
The Basic Express on a C.O.D. aie 
pioni poi us rE details. 


artet Hive? ‘ete “VIPER T ter ag me 


10 days, we are absolutely fascinated 
with it. Alex Morales and I spent one 
afternoon and evening. developing a 
"Carousel" program for it -- you know - 
the Arcade game that is a shooting gal- 
lery with the ducks that must be shot 


before they reach the bottom row and eat 


up your bullets! That game was 75% fun- 
ctionally finished after only four hours! 


Looking at the "VIPER I" and Extended 
Basic in the cold reality of daylight, 
we found 4 problems with it: One hard- 
ware and three software - all easily | 


Te is wise to use the ae ie 


on the same circuit. (Shame on yo, 


al your outlets should pá property ae 
ounded anyway) 


SOFTWARE: (A) Penbonady Problems: 


> end of memory pointer is set to sh- 


allow and does not allow total access ~ 


This can and will be rapidly changed. 


(B) The Command Word Tokens (Print, bata, 
“Circle, etc.) are located in the lower 

Case ASCII area instead of ae Co 
characters in the @ - 3G decimal ASCIT 


a OL 


area. This means, urtil we modify the 
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language your printer won't be able to 

print lower case characters. This was 

done purposely so all your old software 
would also work in Extended Basic. 


(C) When using the print function with- 
in an INPUT STATEMENT such as [INPUT 

"sz",G] the computer will print out 
"SIZEG". 


The beauty of having the Extended Basic 
on tape is that we can and will modify 
it. When the Extended Basic is finally 
tweaked to perfection, an 8K EPROM Cart- 


ridge will be available so you can elimin- 


ate the 84 minute load! 


Finally, we feel, if you've been waiting 
for ZGRASS and the AstroVision add-under, 
it looks like you've got at least another 
6 month wait, and the word is that it is 
being downgraded to 16K of RAM and CPM 
and Disk has been eliminated. The VIPER 


is available NOW! The "VIPER" people will 
be expanding their system to the "VIPER 5" 


with DISK Controllers, added memory, etc. 
We're thrilled and know you will be too. 
At $250., how can you lose? 


DOA =, 
ory INVASION FORCE AY 


This game works similarly to Space Inv- 
aders in that the characters march ac- 
cross the screen, when they hit the 
sides, they move down a row. If you let 
them get down to your gun emplacement, 
you'll be destroyed. 


HINT: You gain more points by hitting 
two Invaders when they converge or dam- 
age the force field on either side of 
the screen with an explosion from an 
exploding Invader. For these feats, you 
get an additional 50 points plus what 
you would normally get for one Invader. 
The top Invaders are worth more than 
lower ones. 


EDITORS NOTE: Mike's newest tape, 
"LOOKOUT FOR THE BULL" is one of the 
best we've seen written in Basic! Take 
a look at the WaveMakers ad for more 
information. 


One more note: Many people who bought 
WaveMakers "PACK RAT" are unaware that 
this tape has 2 versions of the game on 
EACH side — Side One is simple graphics 
with fast action, Side Two is complex 
graphics with slower action. The NEW 
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AstroVision Basic Versions are hidden 
within the waiting periods between his 
logo and program, this gives you a tot- 
al of four versions. 


INVASION FORCE 
BY: MIKE PEACE (WAVEMAKERS) 
1 . INVASION FORCE 
2 .BY MIKE PEACE 
3 . JBZBPAIAASMFPMW+1*1CX6"1 +1 *CHETU 
19 NT=6;6=23; B=-53; X=8; & (9) =255; BC=~1 5 FC=8 
26 C=18;S=-35;T=8;J=6;CLEAR ;6070 78 
38 K PX{Y-6,S)+PX(V+6,S)T=T+583FOR 2-870 58;&(16)=Z5 NEXT 


35 T=T4($+35)26x53CY=393CX=-273PRINT #6, °<SCORE? °,T 

4g CY=5+1;CX=Y-5;FOR Z=-24539+RND (5)TO Z+12STEP 5;TV=%(Z 
\ NEXT Z 

5Ø &(21)=255;&(23)=255;FOR D=1T0 2ØSTEP 3;BOX Y,5,D,D,3;% 
(19)=D 

6G BOX Y,S,D,D,3;NEXT D3 &(23)=6;&(21)=8;BOX Y,S, 18, 28,251 
F S<3@B0X X,-39,3,6,1 

65 S=-35; RETURN 

79 CY=6;CX=-48;FOR Z=-24523T0 2+165TV=%(Z)-23NEXT 2;E=-2; 
FOR H=-68T0 O8STEP 5 

Bo E=E+H=26;BOX H,E, 28,2, 1;BOX -H,-E, 28,2, 1;NEXT H;CY=-27 
sCX=-40;PRINT "INVASION FORCE"; GOSUB 336 

99 X=@;CLEAR ;FOR F=GT0 G-S@STEP -26;FOR A=BTO B+75STEP 1 
5;BOX A,F,6,6,1 

16 NEXT ASNEXT F3&(17)=166; &(18)=128; BOX 9,9, 168,88, 3; BOX 

6,9, 136,86,3 
119 I=8:;FOR F=6T0 G-S@STEP -28 
126 FOR A=BTO B+75STEP 15sIF PX(A,FI=ONEXT ASNEXT F;G0TO 1 


138 H F>-4GIF PXIA,F)BOX A,F,6,12,2;BOX A#C,F,6,6, 1512451 
F F¢-3360T0 318 
148 %(22)=255;X=X+JX (1X4; BOX X,-39,3,6,5 
158 IF S=-Z51F TR(1)5=-34;Y=X;BOX X,5-3,1,6,3 
16H IF $>-35BOX Y,S,1,12,3;S2Sths&(16)=50+5;1F S724B0X Y,5 
yl) 12, 2352-30 
170 V=i96; IF S>-35V=Bg IF (PX(Y,5}=1)+(PX(Y,5-5)=6)605UB 39 
188 BOX X,-39,3,6,3;IF ABS(X)>6b60T0 368 
198 ki28)=V:IF A<B+75NEXT A 
268 IF F>G-SENEXT F 
216 B=B+C; IF B<-55C=18;6=6-3 
226 IF B:-20C=-18;6=6-3 
238 IF 1=@60T0 258 
249 GOTO 118 
250 CY=@;CX=-35;PRINT "YOU GOT “EM 
268 J=J-5;G=d 
276 GOSUB 338;G0T0 98 
230 IF TR(LI#IGOTO 288 
290 RUN 
389 8(21)=255;FOR Z=510 7OSTEP 5;BOX X,-36,3,6,3;B0% X,8,3 
98, 3;4(19)=1;4(23)=Z;NEXT Z 


3G Y=X3S=-39s 


One of the most terrific things we've 


GOSUB 38;60SUB 48; 60SUB 46 
328 4121) 2834122) =6; CX=-20;CY=@;PRINT “GAME dictions 
38;G0T0 286 
339 FOR Z=170 466 
348 NEXT Z;RETURN 
358 eee aa 


lie Bal ly ae ROM i Sub-Rout ines . Bsplains the use of the on- 
board routines which allow you to perform such things as you 
find in the “Machine Language Programs” in Cursor. Includes 

- ASCII Standard & Nonstandard Character Sets, Cassette Memory 

_ Structure; Output Ports; Input Ports; Bally Data Base Locat- 
ions; Bally Memory Tocitions; and On-Board ROM 8K Hex Dump. 
$4.49 


2. Hackers Manual. Describes Paani provided in the Tiny 
Basic but not documented in the Bally Instruction Booklet. 
(Additional Commands) . $3.99 


3. Disassembled Tiny Basic (CDOS Z80 Assembler Version 02.15) 
A complete assembly language listing including OP Code and 
coments of the Tiny Basic Cartridge. S8. 4927 


4. Disassembled Brickyard & Clowns. A complete assembly lang- 
uage listing including OP Code and comments. $9. 99 - 


5. Disassembled DEMO Cassette. A complete assembly language 
listing including OP Code and comments. $8.49- 


6. Bally System Description Book. Extensive ia dacus! ; 
"Electrical Specifications for Midway Custom Circuits", Timing 
Interrupt handling explanations, etc. $8.99 


7. Disassembled System Software. A complete assembly language 

listing including OP Code and comments to include: Hame Video 
Game Equates; Port Equates; System Call Indexes; Macros; Music 

Music Equates; System RAM Memory Cells; User Tem 

; Routines; Masks; UPI Routines Address Tables; Sentry; BCD 
Divide; BCD Subtract & Add; Decrement Counters & Timers; Music 
CPU; Vectoring Routines; Paint Rectangle Routines; Write Rou- 
tines; Character Display Routines; Display BCD; Menu Routines 
and much, much more. .$13. 49 


8. Disassembled On-Board Games, A complete assembly language 
listing including OP Code and comments to include: Sécibeling, 
Calculator, Checkmate, Gun Fight. $15.99 


9. Bally Service Manual. Schematics, Parts Lists, instructions 
for removing RF Shields, and EN more. No one should be with- 
out it!! $3.50 


10. PEEK n' POKE: The only manual written that is truly 


beginner level. Opens up the power of: ‘machine language; 
tells how to get floating point decimal out of this 
machine along with programs. $8.25 


NOTE: ALL MANUALS INCLUDE FIRST CLASS POSTAGE 


PLEASE NOTE: Due to the new Postal 
rate increase, we will be raising the 
price of our Manuals. Take advantage 
NOW and order the Manuals you want be- | 
for. 20 November 1981 and save money! WY, 


seen this year is the "MACHINE LANGUAGE 
MANAGER" cartridge offered by "THE BIT 
FIDDLERS". This cartridge plugs in to 
‘the front of the Bally like all game car- 


tridges and comes with it's own NEW Key- 


pad overlay and thick manual (42 pages 
iof instructions plus a complete listing 
lof the cartridge itself). 


This is, to the best of our knowledge, 
the FIRST Non-Bally (or AstroVision) Car- 
tridge ever produced! 


The cartridge uses a small 3 x 5 charact- 
er set, which allows you to program dir- 
ectly in HEX and totally free's up the 
capability of the Bally. You can get up 
"4" colors without splitting the screen, 
and access many of the On-Board Subrout- 
ines that Bally Basic = impossible to 
use. 


This cartridge also utilizes the tape 
interface, so everything can be stored 
and retrieved from tape. 


‘For the beginner, this cartridge, along 
with a machine language programming guide > 


provides a rather complete programming 
course. Even if you don't have any de- 
sire to learn machine language program- 
ming, games such as "BESERKER", etc., 
will be available shortly, written tot- 
fewest in ae ee niga your 


The orange: will sell for $54 .95. 


SPECIAL SEER: we, are currently stock- 


a Ey case hiar $49.95. All 


. you have to do is get out a game car- 


tridge you never play, remove 4 screws 
and take out he boata ang -replace ak 


eS ana save eee "$5.00. 


Send $49.95 (Calif. Residents add 6% — 
sales tax) to the "BASIC EXPRESS", P.O. 
Box 1763, Big Bear Lake, CA 92315 prior 


to 20 November 1981!! (This cartridge 
is now in stock -- no waiting). 
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wey aii AL'S POKER BANDIT 


This program simulates the POKER "One Arn 
Bandits" you find in Las Vegas with the 
"exact' same pay-off ratios! 


At the top of the screen you will see the 
total amount of your money, at the screen 
bottom is the amount of your bet; turn 

knob to select $1 - $5, and pull trigger. 


Cards will now appear on screen. Move 
joystick left or right to select cards 
you wish to get rid of (using arrow) and 
pull joystick back toward yourself and 
move to next card. If you have the cards 
you want to keep, pull trigger! 


ODDS TABLE 
1. .PALR: .DAy Siaie-s sie ausig.ny esis: s 1 x..Bet 
(Jacks or better) 
2. PAIR Day Seepra 2 & ists epee 2 x Bet 
3 OF A KIND pays.......-. 5.x Bet 
STRAIGHT payS...-.«2-+s8ee S..%. Bet 
PLUSH Pay Sa 20-6» Stee sepsis TO x. Bet 
FULL. HOUSE payS....... L5 = Bet 
4 OF A KIND pays....... 25 x Bet 
STRAIGHT FULSH pays....50 x Bet 
ROYAL FLUSH pays...... 250° Bet 


AL? S POKER BANDIT 
BY: AL ROGINSKY 


ry 


5 CLEAR ;NT=8 ; 
29 k(9)}=-1;BC=186;FC=127 j è 
36 (=25;6=8 
5@ GOTO 4908 
9@ C=C-0;G0SUB 5184 
196 FOR A=-68TO bØSTEP 36;GOSUB 5608;NEXT A 
118 W=@;G=8sH=@3 J=8;K=0; 1=5 
159 FOR D=1T0 53;a(D)=D;NEXT D 
208 FOR A=-6ØT0 G@STEP 38 
256 BOX A,#, 23,28, 2 
269 D=RND (52);1F a{D)=99G0TO 268 
27 a(D)=D;CX=AsCY=6 
286 IF D>3960T0 588 
299 IF D)2660T0 458 
369 IF D>1360T0 468 
35d PRINT "#":BOX A-1,8,5,3,3;E=D;F=1;G0T0 688 
4G PRINT "V":BOX A-1,1,3,3, 1;E=D-13;F=2; 6070 688 
456 PRINT "8"sBOX A-1,8,5,3,33BOX A-1,8,3,5,33BOX A-1,-1,1, 
6, 3;E=D-263F=3;6070 688 
509 PRINT "+*sBOX A-1,8,3,3, 3;E2=D-39;F=4 
bøg IF A=-49R=F;L=E 
619 IF A=-38S=F;N=E 
629 IF A=@T=F;N=E 
636 IF A=3@U=F;0=E 
649 IF A=6ØV=F;P=E 
700 CX=A-7;CY=16 
718 IF E=1PRINT "A 
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726 IF E=11PRINT "J 

730 IF E=12PRINT "0 

749 IF E=13PRINT "K 

750 IF (E>1)+iE¢11)=2PRINT 44,£ 

768 a(Di=99 

779 IF W=1RETURN 

BAA NEXT ArA=-68 

1009 IF JX(1)380=A+30;1F AX69A=68 
1920 IF JX(1)<GA=A-30s IF AC-48A=-68 
1048 CY=24:CX=AsPRINT "+ 

1859 FOR B=1T0 268;NEXT B 

1969 CY=24;CX=A PRINT " ";W=1 

1878 IF TRi1)G0TO 2888 
1880 IF J¥(1)BOX A,@,26,32,2;60SUB 5888;605UB 1588 
1999 GOTO 1096 
1508 IF A=-486=A 
1518 IF A=-3@H=A 
1528 IF a=#1=A 
1538 IF A=38J=A 
1548 IF A=a@K=A 
1558 RETURN 
2008 IF 6 A=G;60SUB 25¢ 
2016 IF H A=H;60SUB 25¢ 
2029 IF I=OA=1;G0SUB 259 
2838 IF J A=J;60SUB 258 
2040 IF K A=K;60SUB 25¢ 
2196 C¥=-30sCX=-18;PRINT "WAIT ";NT=3 
2568 X-836-0;FOR 7-170 13;FOR Y=270 4 


2526 MU= Y+L;NEXT peo 1 

2536 IF X=36=1 

2548 IF 1=46=5 

2558 IF X=56=25 

2569 IF X=66=2 

2576 IF X=76=15 

3980 FOR F=1T0 4 

31 IF (RoF)+(S2F)+(T=F) + (USF) +(VEF) 2562103 We5 

3828 NEXT F 

3509 FOR 2=170 4 

3519 IF LOM B=L;L=M;M=B 

3529 IF MON BEN; M=N;N=B 

3536 IF NDO B=N;N=0;0=8 

3549 IF O>P B=0;0=P;P=B 

3550 MUSZ;NEXT 7 

3548 IF (L=N-1)+(M=N-1)4(N=0-1)+(Q=P-1)=4G=83 IF W=56=56 

3570 IF L=iL=14;G0TO 3509 

3588 IF (L=19)+(6=56)=26=259 

3585 IF G=1G0SUB 6888 

3599 IF GFOR Z=1T0 1@sFC2RND (32148-1; CY=24;CX=-26; PRINT 

"WINNER"; NEXT Z 

3688 NT=9;6=6x0 

4999 CLEAR ;C=C+6;GOSUB 5189 

4918 IF CCICY=8;CX=-18;PRINT "BUSTED"; STOP 

4020. Q=KN(1)+25+5;0=0223CY=-38sCX=-1@;PRINT "BET $", 90,05. 
IF TR(1)=@60T0 4826 

4938 IF Q=660T0 4628 

4949 IF C-0<@60T0 4926 


4956 GOTO 98 Se eee sie pea your husbands hobby or work. So let's 
a FOR ab a 2 i - get together and see if we can't enjoy 

16,8, OX. | this past-time with our guys. Let's 
think about branching off into our own 
little spot and be a part of this com- 
puterized world too. 


Write to me or Fred Cornett and let us 
know how you feel!! Speak up!! It _ 
could prove to be a lot of fun. 

Peggy Gladden 

59400 Nine Mile Road 


Dear abd? ‘ À | eee to ae South Lyon p Mich. 4al 


Do hee zor) as though BES A 


gn in 
"SUB- -ROUTINE" 2 ‘Has your MENON got a 

CHER" gone? 
Ah-ha!! then it's "CLEAR" that you are 
the wife of a Bally lover. However, 
that's okay. Our men only think they 
can "INPUT" better! 


You know, if we're not careful, we're 
gonna become a slowly forgotten tribe. 
We'll be allowing our husbands to be . 
happly married to those inquisitive lit- 
tle machines that turn our TV rooms into 
instant arcades! 


< j w A 
"nannan n 


Ea E Taoa abort A ENR pe 


will remember we I am. 


Ta y husband “faving robe itn your uate or ree you 
beeen I would Diog to see us wives un- t j 


FORAS DA we will 


= do my work | in less 
che time. . ` 


I know that there are plenty of you out 
there who would like to participate in 
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We will also Tune-Up your hand controls 
for an additional $8.50 per pair. If you 
include them with your unit you will | 
save $2.75 return postage. PLEASE DO NOT 
include unnecessary parts with your unit 
anda as dust COMET: Boe claro etc. 


T Y C O O N 
p BY: ALEX MORALES 


In this simulation you man- 
age a small factory that produces 


three different kinds of products (P1 - 


P3). Three different kinds of raw mat- 


= erials (Rl - R3) are required to produce 


the products. Each product requires ex- 


actly two raw materials with a different > 
subscript. For example, to manufacture 
one unit of P2, you would need a unit of 


Rl and a unit of R3. To manufacture one 
unit of P3, you would need a oar each 
of Ri and R2. 


There are two levels of play in this sim- 
ulation. The range of costs and prices 
for level 2 will be in parentheses. 

The cost of raw materials varies from 
$10° to $20- ($10 -=.30)* per unit? It 
costs from $1 to $9 ($1 - 20) per unit 


to manufacture a product from raw mat- 
-erials. The selling price of each fin- 


ished product varies from $50 to $90 
($40 - 104) per unit. Prices of raw 
material and manufacturing costs will 
vary by not more than $3 ($5) per turn. 
Prices of finished products will vary — 
by not more than $6 ($10) per turn. 


You will receive a data report at the J 
beginning Of each turn. This report- 


will give you the number of units you 


have on hand, available cash, and the 
manufacturing cost. You can buy (B), 
manufacture (M), sell Lole: or do noth- 
ing (O) each turn. 
ure a given product, you must have enou- 
gh of the correct kind of materials on 
hand. If you make a mistake in ordering 


you will lose a month's transaction. 


You can maine this factory monthly for ; 
up to 36 months in 12 month increments. 
After your time has expired, the mater-. 
ials and/or products that you have on 
hand will be automatically sold at the 
current prices and your profit will be 
computed. 
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In order to manufact— 


TYCOON r Y 
-A BUSINESS SIMULATION i 
BY: ALEX MORALES ee ge ot 


ITEM w RIALS acs 
f pe 


5 Nī=i; CLEAR SCY=95 INPUT Ja DIFFICULTY: 1 OR 2%"; IF 
(741) #(132)60T0 5 ie | 
19 CLEAR ;C=508;M=2 
26 FOR I=iT0 3 
38 VL) =8p a 143) =9 
4G O(1+4)=RND (3)415 
56 Q(1+9)=RND (18)+78 
bð NEXT I 
78 GOTO 698 
Q PRINT * ITEN# ? ",:BOX CX,CY,6,8,13 N=kPs p TV=N; IF INGAR) 
 HDSDPRINT PRINT " ERROR - LOSE MONTH; RETURN 
99 PRINT ;N=N-48; RETURN 
188 FOR I= 110 ee 
118 IF Z=1J=RND (5)-2;60T0 126 
4145 J=RND (9)-4 © : 
128 J=alltb+] 
136 IF 1241IF (J418)+(J}20)60T0 i18 
135 IF 2=21F (J416)+(J)38)6070 MS 
149 ailte] 
150 IF Z=1J=RND (11)-5;G60T0 10 
155 J=RND (28)-19 
168 J=a(1+9) 4] 
178 IF 1=1]F (456) + (196) 6070 158 a 
175 IF Z=21F (J¢40)+(J>185)60T0 155 A 
189 3(1+9)=J 
198 NEXT I a 
208 IF Z=10=RND (5)-2;6070 216 A 
205 J=RND (9)-4 c 


219 J=N+d SSF eN 
228 IF Z=11F (91) 4 (999) BOTO 208 \ x 
2251F 1=21F (IG) +(0>26) 6070 265 
238 Mad 
248 RETURN 
258 CLEAR ;PRINT “ ITEM MATERIALS PRODUCTS 
268 FOR I= 110 3: 
59:PRINT #1, ,1,;EX=- -33 PRINT #8, aD, "853 sCHe-t13 P 

RINT ROERNE =3ģ; PRINT #3,a(1+3), g", sCX=563 
PRINT #1, "8", 31149 : 
288 NEXT 1;RETURN ; ‘ 
30 INPUT " AMT. OF MATERIALS?"A 
318 GOSUB 88 
334 C=C-Axa (Nth) 
346 IF Ci@G0TO 378 
358 a(N)=9(N) +A 
368 RETURN 
378 C=C+AKS (N+4) 
388 PRINT " INSUFFICIENT FUNDS 
398 RETURN 
= 49G INPUT ® MANUFACTURE AMT. 2"A 

AL GOSUB 88 
-426 C=C-AxXN 


438 IF CC@PRINT " INSUFFICIENT FUNDS";C=C+AxMs RETURN 
449 FOR I=1T0 3 . 
458 IF I=NGOTO 499 
46g QiLi=a(1)-A 
479 IF Q(T)<@PRINT * MATERIALS GONE"; @(ii=a(1)+A;C=C+AxM; 
RETURN | 

4B NEXT 1;9(N43)=9 (N43) +A; RETURN . 
508 INPUT " AMT. TO SELL?"A 
= 518 GOSUE 88 
528 8(N+3)=3(N+3) -A 

53d IF @iN+3)(@G0T0 568 
548 C=C+Awai(Nt9) a 
‘558 RETURN 
548 @(N+3)=@ (N+3) +A 

57@ PRINT “ PRODUCTS GONE 
588 RETURN 


~ 
w 


69@ CLEAR ; INPUT a HOW MANY YEARS? re 3)"; IF i¥é er 


BOTO 688 

61g Y=¥x12 

629 FOR T=9T0 Y 

636 GOSUB 258 

649 PRINT " MONTH",#3,T," YOU HAVE $",#4, C3PRINT " MFG. 
COSTS ARE $",#1,M | 

656 PRINT " TRANSACTION (0,8,M,S)? ",;BOX CX,CY, 6,8, L3 R=KP 

sTV=R 

660 IF (R=79)+(R=6)+(R= 

67 PRINT ;GOTO 458 

686 IF R=64G0SUB 369 

698 IF R=7760SUB 489 

700 IF R=B8360SUB 599 

718 GOSUB 199 

726 NEXT T 

738 PRINT * END OF +, Y," MONTHS 

-746 FOR [=170 3 

758 C=C+3(1)xa (1+6) 

768 C=C+9(1+3)wa(1+9) 

776 NEXT I 

789 C=C-589 

796 PRINT " YOUR PROFIT IS SALG", 

866 K=KP; jRUN 


7)+(R=93) PRINT ;6070 ég 


Science may never come up with a 
better communications system than 
the coffee break. ; 

Earl Wilson 


“APOLO! OGIES 


to Bill Templeton are duet ahars 
was a mistake in our last issue and Bill 
is the author of the program "CONNECT- 
THE-DOTS". Please accept our sincere 

| apology: Bill!! 
WOCOCCOCOCCOCOCLCC 


~SHANGRI-LOGIC 

bys Phil D'Angelo 
Shangri-La Video Productions 
Here's what we hope will be the first of many articles 


exploring the world cf video and it’s e relationship tore 
your Bally, 


As you already know, the Bally Arcade is a dynamic game 
system and easy to use micro-computer. What you may not 
realize are it’s full capabilities and it’s potential as 
a video graphics palette and titling system. Å good 

working knowledge of "BASIC" and a bit of artistic flair 


can turn your home video tapes into interesting and pro- 


fessional looking shows. You also have the added bless- 
ing of owning one of the few home computers that puts . 
out a true "NTSC" signal. This is why the colors and 
definitions that you get from Das Bally are so varam 
and crisp! 


What this means to you at home is that you can hook up 
your Bally to your video cassette recorder and get a 
clean vibrant image that can be recorded and copied with 
-out falling coapletely apart. T bought and sold a few 
computers before the Bally. Qne costing $88 gave me an 
image that was pure “trash"; the next one was the apple 
of my eye until I found out I needed to spend hundreds 
of dollars aore to do what I now do with ay Bally at the 
push of a few buttons. 


All you have to do is hook the Bally ’rf’ out Ek 
to your VCR ’rt’ input and tune it to channel 3 or 4 as 
you do your TV. You will find that tiae spent fie tun- 
ing the image will help increase clarity. For a real 
juap in quality, go back to VOL. I, Issue #5 (June °88) 
of the BASIC EXPRESS for the schematics for the Audio/ 
Video direct box. This takes the signal, splits it into 
it’s component parts and feeds into your VCR audio-in 
and video-in jacks. The results are superb and the in- 
vestment is small. Other options are the new "VIPER" 
with it’s expanded memory and pulti-color displays, and 
still in the works a "new" box that will replace the old 
"rf”’ modulator, and give an even more distinct image. 
Some projects you may enjoy doing are putting together — 
some of your favorite graphics programs on video tape. 


Then, by way of the audio dub function add some of your 


favorite ausic to it with sose imagination you can even 
put together your own intermission segaent complete with 


‘countdown and fireworks to herald the start of the next 


feature on tape... 


© so move diagonally. 


MONSTER CHASE. 
bys ALEX MORALES 
Here is a short fun game that everyone 
can enjoy playing. 


The object is to 'stay alive' (keep away 
from the Monster) for 10 moves. At lev- 
el one this is pretty easy, level two is 
a little harder, and at level three it 
is almost impossible! 


- You. are :."v" and «an only move up, down, 
right, or left. The Monster "M" can al- 


MONSTER CHASE 
| BY ALEX MORALES 


5 NT=6; CLEAR ;CX=-6l; CY=05PRINT “DIFFICULTY 1, 2 0R 3? 
O P CX=-24;PRINT "-- +" 
b Ch=3S= (KN(L) #128) 865 IF $=85-1 
7 PRINT 44,5, ;1F TR(L)GOTO 18 
B GOTO 6 
19 CLEAR ;BC=8;FC=7;L=-18;4=19; 12-18 Y=18;R=18;C=-18;0= 
18 
-28 BOX 8,8,46,46, 
-= 3# FOR A=-18T0 18STEP 9 
4G FOR B=-1870 185TEP 9 
5@ BOX A,B,8,8,2;NEXT B;NEXT A 
bð CX=L;CY=M; TV=77;CX=M;CY=L; TV=89 
7 CX=-35; CY=32;PRINT "MONSTER CHASE 


86 IF w(t) IIF IYUD=9IF RE CXER;C CY=C; TW=324R=R+9; CXR 
;CY=C; TV=89;60T0 138 


98 IF JY(L)=L1F IX(L)=61F ceo CX=R; CY=C; TV=325C=C+9; C=C 


 CX=R; TV=89;6070 138 
106 IF JX(1)=-1IF J¥(1)=O1F R#-Q CX=R;CY=C; TV=32; R=R-9; CX 
=R;CY=C; TV=89;6070 134 


119 IF JY(D=-LIF JXC1)=1F C#-0 ete ctsy TNC o 


=C; CX=R; TV=89;6070 138 
115 IF TR(D60T0 138 
126 GOTO 88 
138 IF R=KIF C=Y60TO 358 
148 IF X=RIF Y<C Det 
158 IF ORIF YC D=2 
168 IF ORIF Y=C D=3 
178 IF ORIF WE D=4 
186 IF X=RIF YC D=5 
199 IF X<RIF YC D=6 
206 IF X<RIF Y=C D=7 
216 IF ARIF Y<C D=B 
226 IF S=1D=D+RND (3)-1 
225 IF S=2D=D+RND (2)-1 
239 IF D=6D=8 > 
248 IF D=90=1 +. 
258 IF DHIF IKSK=X-9 
260 IF D)5X=X+9 


VOL.III PAGE 34 


7 a 


es SANYO PORTABLE CASSETTE 


© 9, SOFTWARE TAPE: Bio- >-Rythym 


278 IF D>3IF D<7¥=Y-9 


286 IF (D¢3)+(D=B)Y=¥+9 
299 IF X<-18X=1+9 


368 IF Y>1i8Y=¥-9 
319 IF X>18X=X-9 
328 IF Y<-18Y=Y+9 
323 CX=L; CY=M; TV=32 
326 CX=X;CY=Y; TV=77 
328 L=X;M=Y 


336 IF X=RIF Y=C60T0 356 


346 NEXT T 
345 NT=Ø;k(21)=15;4(16)=49;FOR 1=256T0 OSTEP -254(19)= 158 
(26) 15NEXT 1;%(21)=9;CX=-35;CY=-32;PRINT “YOU SURVIV 
ED!";6070 388 | 
358 CX=CK-65TV=77;FOR F=1T0 8 


369 NT=6;FOR 1=870 ISTEP -2;BOX X,Y, 1,1 3541211255; 4123) 
=208; (19) =F X13 NEXT I; NEXT F; t(19)=0; (2129; &(23)=8 


: 376 CX=-38; CY=-32; PRINT "YOU ARE EATEN! 
388 IF TREADRUN 
39% 6070 388 


| ANNOUNCING 

Fa» PRODUCTS AVAILABLE 
* _ from 

THE BASIC EXPRESS 


1. BACK ISSUES: 
Vol. Eo oe e ee ee © © © © 8 ooo .$9.75 
: Vol.11. oe eee eco ee oe p .$9.75 


2. ISSUES ON TAPE: 


E 
S 


IMCL TSBUC.. 2. «asa cay soe 
s Deuble-lesye<.s. 6 esa os se Be OD 


HAND CONTROL CABLES: 
Set of EWO. eee see ee 
_ Four cables. ita Ge ake 


4. HEAT SINKS: 
a Set Of “threes: oe 


-$10.49 


ented 


© 5. C-30 BLAND CASSETTE TAPE: 


Case (10 tapes) of high 
_ quality digital Soe 


: tape. see eretesi sos .$15.99 
6. HEAD DEMAGNATIZER. <.. 921.95 
7. CASSETTE TAPE ERASER. Sal. 95 


RECORDER. s $44.95 


and Moonlanding.. sp apt ee 


Call regarding availability fdr ‘G50 2D 
orders. All items are priced to in- 
clude shipping. California residents 
please add 6% sales tax. 


A num 


SOUND” EFFECTS !!! 
oe 

MIKE PEACE 
As orders come into WaveMakers they seem 
to be accompanied more and more by quest- 
ions on how to do something not covered 
in the basic manual. I've decided to try 
to answer some of these questions and 
share them via THE BASIC EXPRESS. 


ser of you asked "How do you make a 
siren like the police cars use?" This can 


be used to produce flying saucer sounds 


as well as police cars. As Dan Dresher 
pointed out in an earlier BASIC EXPRESS 
the use of the LOOP is one of the most 
effective and efficient ways of accomp- 


lishing millions of tasks performed by 


the computer. This program can be slot- 
ted into any program at the point that 
you want this sound to appear. Use any 
variable that is available. i 


10 &(22)=15;FOR A=1TO 399;B=A:10 
20 &(17)=RM+2øØ; NEXT A 


In this program we first turn on the vol- 
ume of tone &(17) by steeing &(22) to 15. 
Next we loop "A" 300 times and divide it 


by 1% and store the answer in variable B. ~ 


RM is the remainder of this division at 
the end of LINE 1% since the value of "A" 
cannnot always be divided evenly by 19 
we can have up to 10 values in variable 
RM Ø thru 9. We then set tone &(17) to 
RM and add 20 to it so that the tone will 


go from 20 to 29 for every 10 repeats of 


the loop and do that 30 times. Now we 
just need to get the sound to start qu- 


iet, then loud, then back to quiet so 


it sounds like a police car passing. 

ABS to the computer means absolute val- 
ue. That is if a value is negative, 
the ABS value is positive and if a val- 
ue is. positive it remains unchanged. 
Keeping this in mind let's change line 
1 and add something to line 29. ; 


19 FOR A=-159TO 15¢ 


29 &(22)=15- -ABS (A)+ 10; &(17)=RM+29;NEXT A 


ae we start with the volume ea in 


trace “ne iBS volus RE oan ‘divided By 
1G or 15-15 so the start of our volume 


is Ø and increases as the loop continues © 
toward Ø and then decreases as the number 


in the "A" counter gets larger. "Can I 
get a machine gun sound to work off the 
trigger?" Why not! Here's how. 


EXPRESS. 


1% &(23)= 255;&(19)=150 ; 

29 FOR A=255TO ØSTEP -25;IF A<2ØØIF TR 
(1) A=255 

39 IF A<2ØøØA=øØ 

49 &(21)=A;NEXT A 


"HOW ABOUT AN EXPLOSION?" 


1$ FOR A=255TO ØSTEP -1; &(19)=90x (A>89) 
20 &(23)=A; &(21)=255;NEXT A 


In this program we use a 'little used 
statement' known as a "true/false state- 
ment! If a statement is 'true' the com- / 
puter recognizes it as 1 and Ø if false. 
Line 18 above is a "true/false statement" 
This can take the place of an "IF State- 
ment" To do the same thing that we just 
did in line 1 using "IF Statements" it 
would look like this: 
1p FOR “A=255TO QSTEP -10; &(19)=90; IF A< 
89&(19)=0 
and even with all that it wouldn't work 
as fast and as well. It's possible to 
change these sounds by adding vibrato 
&(20) to get totally different sounds. 
In the first program add line 5 &(29)= 
15 and you've changed the plice car to 
a flying saucer. 


If you have any questions you would like 


answered, just drop a line to Mike Peace, — 
‘RS, Box 94801, Schaumburg, IL 


c/o WAVEMAKI . 
60192 and look for it in the next BASIC 


LATE UPDATE 
by: FRED CORNETT 


| We have solved most of the problems 


we found with the "VIPER". 1. We can | 
now get the complete lower case. 2. | 
The problem we had with INPUT "HIGH" 
,G was our fault. We deal with 4 | 
other micro-computers, and sometimes | 
we make syntax errors. The correct 
way is INPUT "HIGH"G. 3. We have / 
coverted "EXTENDED BASIC 1.0" to | 
load through AstroVisions's New Bas- | 
ic Cartridge (299% Baud). The Ex- 
tended Basic loads in 48 seconds. 
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FORMERLY THE CURSOR GROUP 


PRICES FOR ALL PRODUCTS MENTIONED 
WITHIN OUR PAGES ARE SUBJECT TO 


oe 
al 


BOX 94801 


LOQkKOWT 
for the BULE 


<PLAYER 1> 


OE, Bis oe ee eS SS 


+ Y + + 


+ + ° 
+ 


eee e+ 


¢- ¢ © + 
+ 


tt tetee + 


<BONUS 100> 


TAPE IO 


THE CHALLENGE NEVER ENDS, BECAUSE THE LEVEL OF PLAY IS BASED ON YOUR SCORE. YOU ARE IN 

A FIELD PICKING CLOVER ONE BY ONE AND FROM TIME TO TIME A LARGE (BONUS) CLOVER POPS UP. 
THIS SOUNDS EASY BUT WE'VE ALSO PUT A BULL IN THIS FIELD WITH YOU AND HE IS GETTING MAD 
BECAUSE YOU'RE PICKING HIS CLOVER. THE MORE YOU PICK THE MADDER HE GETS AND THE FASTER 
HE RUNS. HE WILL GET YOU, SO WE'VE ALSO GIVEN YOU UP TO TEN LIVES. BELIEVE ME YOU WILL 
NEED THEM. THE GAME CAN BE PLAYED WITH ONE TO FOUR PLAYERS ON INDIVIDUAL CONTROL HANDLES 
KEEPS SCORE AND LEVEL OF PLAY FOR EACH PLAYER, CHANGES COLOR AS HIGHER LEVELS ARE REACHED. 
SIDE ONE HAS MACHINE GRAPHIC BULL AND MAN. SIDE TWO IS FOR THE MORE ADVANCED PLAYER. 

TAPE IS RECORDED IN BOTH BALLY AND ASTROVISION BASIC (THE COMPUTER SELECTS THE PROPER 
ONE). THIS IS PROBABLY THE MOST FUN AND CHALLENGING GAME EVER WRITTEN IN BASIC. 


LOADS QUICKLY. $10.95 


CHANGE WITHOUT FURTHER NOTICE 


CALIFORNIA 92315 


BIG BEAR LAKE, 


POST OFFICE BOX 1763, 


FIRST CLASS 


‘SUMMER 1981 
BALLY Professional Arcade 
Software and Hardware 


This SOURCEBOOK is a compilation 
of all known sources of software, 
hardware, services, etc. avail- 
able for the ARCADE users. The 
SOURCEBOOK contains over 350 
entries with 80 pages of in- 
formation current through July 
T981: 


Please send $5.00 cash or money 
order to: 


RMH Enterprises 
635 Los Alamos Ave. 
Livermore, CA 94550 


MOVED! 


PLEASE NOTE OUR NEW ADDRESS 


FIRST CLASS 
U. S. POSTAGE 


PAID 


BIG BEAR LAKE, CA. 
PERMIT NO. 1 


